dim ws : set ws = CreateObject("WScript.Shell")
dim varName : varName = "PADS_SHORTCUTS_ROOT"
dim regPath : regPath ="HKEY_CURRENT_USER\Software\MyApp\" & varName
dim varValue : varValue = ws.RegRead(regPath)

dim exe
exe = varValue & "tools\PADS_Command.exe"
dim fso
set fso = createobject("scripting.filesystemobject")

if fso.fileexists(exe) then
ws.run exe
end if
set fso =nothing
set ws = nothing